Removes all secure layer of the secured message.
Syntax:
Returns:
Returns 1 if the operation is successful; otherwise returns 0 if the operation fails.
Remarks:
Multiple layers of security can be applied to a message. The method as to how it has been secured is indicated by the "Content-Type" header of the message.
Example:
Dim oEdiDoc As Fredi.ediDocument
Dim oMailDocument As Fredi.mailDocument
Dim oMessage As Fredi.mailMessage
' Create instance of Framework EDI.
Set oEdiDoc = New Fredi.ediDocument
' Get internet mail document object
Set oMailDocument = oEdiDoc.GetMailDocument
' Disable auto-processing so that message can be read as is.
oMailDocument.Option(MailDocOpt_Auto) = 0
' Load the mail document
oMailDocument.Load App.Path & "\PackedMsg.TXT"
' Get the message.
Set oMessage = oMailDocument.GetMessage
' Decompress message.
oMessage.Process
oMessage.Save App.Path & "\UnpackedMsg.TXT"
MsgBox "Done"
Sample